home *** CD-ROM | disk | FTP | other *** search
/ Kids' Bible Fun Pack / Kids' CD-ROM Bible Fun Pack (1997)(Education Publishing Concepts)[Mac-PC].iso / mac / PARSONS / DDNOAH.DXR / 00516_Field_SayitExample.txt < prev    next >
Text File  |  1997-05-01  |  642b  |  26 lines
  1. on exitframe
  2. global TheCast, TheSound, TheSoundAt, TheWait, 
  3. global TheCount, TheSprite, TheReverse
  4.  
  5.   put [0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0] into TheCast
  6.   put [10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10] into TheWait
  7.   
  8.   set TheSound = 0
  9.   Set TheSprite = 0
  10.   Set TheReverse = 0
  11.   Set TheCount = 0
  12.   Set TheSoundAt = 1
  13.   
  14.   put [171,172, 173,174,175,176,176,177,178,179,180,181,182] into TheCast
  15.   put [10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10] into TheWait
  16.   Set TheSoundAt = 9
  17.   Set TheCount = 13
  18.   Set TheReverse = 8
  19.   Set TheSound =  209 
  20.   Set TheSprite = 25
  21.   
  22.   SayIt
  23.   
  24. end
  25.  
  26.